home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh3x
/
sh31.d64
/
listing 4
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
474b
|
28 lines
10 REM DEMO-LISTING 3
11 :
15 REM ECHO AM ENDE
16 :
20 REM LADEN EINER VORHER ERSTELLTEN
21 REM BLOCKTABELLE VON DISKETTE
22 :
25 BLOAD"B.DEMO",8 BLOCK 31
26 :
30 REM LADEN DER TONDATEN
31 :
35 BLOAD"S.DEMO",8
36 :
40 REM ABSPIELEN NACH BLOCKTABELLE
41 :
45 VOLDEF 0,5,10,15
46 :
50 PLAY BLOCK 1 SPEED 10
51 PLAY BLOCK 2 SPEED 10
52 PLAY BLOCK 3 SPEED 10
53 :
55 REM BLOCK DREI WIEDERHOLEN
56 :
60 FOR I=5 TO 0 STEP -1
65 VOLDEF 0,I,2*I,3*I
70 PLAY BLOCK 3 SPEED 10
75 NEXT I